home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 2 / CD ACTUAL VOL 2.iso / programa / tunplus / tun / winftp.mac < prev    next >
Encoding:
Text File  |  1993-11-18  |  475 b   |  29 lines
  1. # Display the Message Window
  2. ShowMessage
  3.  
  4.  
  5. ReadVar "Enter Your Host Name" HOST 
  6. IfEqual "" %HOST exit
  7. ReadVar "Enter Your User Name" USER 
  8. IfEqual "" %USER exit
  9. ReadPasswd "Enter Your Password" PASSWD
  10. IfEqual "" %PASSWD exit
  11.  
  12. verbose "on" -s
  13. debug "on" 
  14.  
  15. #Connection
  16. login %HOST %USER %PASSWD
  17. IfError ERROR
  18. lcd "\\tuntcp" 
  19. fcd "/tmp"
  20. mput "*.bat"
  21. logoff
  22.  
  23. Echo "Macro is ended" -b "Message"
  24. exit
  25.  
  26. Label ERROR
  27. Echo "Connexion Error" -b "Error"
  28. exit
  29.